In the thick of things... 

We grew! And outgrew our britches. 
So we are packin' up and movin' down the 
road a bit. Right smack dab in the center 
of Santa Barbara. Are we getting respec- 
table? Not hardly. But I think our jeans 
and t-shirts will compliment the plethora 
of ties and skirts that inhabit the rest of 
the building. We were even approached by a 
representative of the Chamber of Commerce 
(she left muttering). Maybe there is a good 
reason why we were put in the basement... 
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Title 



Cube Cover 

Meteor 

Dinosaur 

Fireball (System FIRE /) 

Tax Deductions 
Compiler Instructions 
Compiler (with Super Hustle 
Load/Merge 



Filename 



Turns 
CTR-41 



A 12 & 267 

B 118 & 347 

C 157 & 378 

FIRE 202 & 413 



Count 
CTR-80 

7 & 155 

68 & 201 

91 & 219 

117 & 240 



A 15 & 271 9 & 157 

B 83 & 323 48 & 187 

C 145 & 373 84 & 216 

D 242 & 450 140 & 261 



Tape CLOADing Notes - This tape may load at an ODD RECORDER VOLUME. Set the volume LOWER than normal for your first attempt, 
then increase it slightly until the tape loads. If the first copy of a program won't loaa, try tne second. That is why it Is 
there. Model 1 only: Put an AM radio very close to the keyboard, tune it to a non-station, and you can listen to tne tape 
loading in. Adjust the recorder volume so the hash from the computer sounds 'cleanest' during a load. Model ill only: Load 
the tapes at the LOW speed (POKE lo913,0). 

Subscribers - The month on the mail label is tne last month of your subscription. If you have a cassette suDscription, tne 
number next to the month is the amount it would cost to convert the rest of your subscription to tne disk version (.♦«». £.0 per 
issue for o or less months, fcj.7b per issue if more than b months j. 
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Playln 1 with blocks... Cube Cover uses machine language routines to spin CLOAD around. 

A Meteor shower curtain... Using the spacebar to fire and the arrow keys to move, you must blast a path 
for your ship through the advancing wal I of rocks. Meteor has sound, so connect the large grey AUX plug to 
an amp I i f ier . 

Bring me the egg, Dino. The object in Dinosaur is to steal the reptile's eggs. To do this you must 
throw rocks at the beast. But watch out, there is an egg-stealing bird about! Note: Dinosaur has sound 
too. 

You must dodge or shoot the erratic missiles in Fireba I I . Use the arrow keys to move your ship and the 
spacebar to fire. The program is in machine language, so to load and run it from tape type SYSTEM<enter>, 
answer the *? with FIRE<enter>, and answer the next *? with /<enter>. Notes: This program has sound also. 
The start, end, and entry addresses are 26000, 32551, and 26000. 



Brilliant deduction, Watson. Now you can keep track of your Tax Deductions . You can save the current 
data to tape or disk, modify it, add to It, throw it at your accountant, etc. Notes: 1) To modify items in 
categories, choose the menu item, "1-6 Add Items to categories". Then answer Y when asked, "Do you wish to 
modify this data?(Y/N)". Finally, enter for the number of NEW items to add and you will be able to modify 
existing entries. 2) If you leave or end the program without saving the current data, you can get back into 
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the program with the data intact by typing GOTO 900<enter>. 

Disk versioners - There is a sample data file for Tax Deductions on your disk called TAX/DAT. You can 

use it to get a better idea of how the program works. 

BASIC is too slow for you? Assembly is too foreign? Now you can write programs in BASIC and run them in 
machine code with Cocpl ler . First, you should run Compiler Instructions to get an idea what limitations 
there are (briefly outlined below). Then, you can see how the Coapi ler works by running and/or compiling 
Super Hustle ( I i nes 6-64 i n Co»p i I er ) : 

1 ) Load Cowpi I er . 

2) Run Super Hustle from BASIC just to see how slow it is by simply typing RUN<enter> (I recommend 
changing the SP«=600 in line 12 to SP=6 for this part). 

3) Now compile Super Hustle by typing RUN 1000<enter> (make sure that the SP=600 is in line 12). Go 
get a sandwich - it takes 11 minutes or so to compile. 

4) When it is done compiling, the start/entry (they are the same) and end addresses will be given. Note 
these if you wish to (and are able to) save the machine language version to disk or tape (ie: through the 
DUMP util ity). 

5) Hit <enter> to play! What a difference, huh?!! 

Coipi ler notes (lots of 'em): 

1) The compiled code resides between 28000 and 32767. If you are using a disk systea, you must run the 
following loader program to move the start of BASIC above 32767 BEFORE load ing Cogpl ler (disk versioners - 
this loader, called COMPDISK/BAS , is on your disk and is accessed by the Away menu) : 

5 CLS: PR I NT" FREE MEMORY HAS BEEN CREATED FR0M»;PEEK( 16548)+256*PEEK( 16549);"T0 32767. 
10 F0RI=0T05:P0KE-32768+l ,0:NEXT 
20 POKE16633,3:POKE16634,128:POKE16548,1:POKE16549,128:CLEAR: REM NOW LOAD OR CLOAD COMPILER 

2) Memory Size is automatical ly set to 27999 if you are using a tape system. 

3) To compile your own programs, load Cowpi ler . Delete lines 6-64. Save your simple compiler to tape 
or disk. Load or write the program you wish to compile (use line numbers 0-999 ONLY). Add the simple 
compiler to your program (tape people - see Load/Merge below). Save a copy of this combination to tape or 
disk (ah, security!). Finally, type RUN 1000 to compile. 

4) If your program has a byte with a value of 195 or 205 imbedded in a PRINT statement, the compiler 
will probably crash (those are the codes for JUMPS and CALLS, and they are seached for and adjusted at the 
end of the compilation). 

5) Reserved words accepted (EXP = number, variable, or expression): 

REM At the beginning of a line only 

END Returns to BASIC (if all GOSUBs have been RETURNed ) 

PRINT Strings up to 127 bytes long and/or EXP 

PRINT $ Strings up to 127 bytes long and/or EXP 

IF-THEN Not ELSE 

GOTO ### G0SUB ### RETURN 

PEEK(EXP) POKE EXP, EXP 

SET(EXP,EXP) RESET (EXP, EXP) POI NT(EXP,EXP) 

CLS CHR$(EXP) LET 

6) Operations are done in the order written (no order of precedence) unless enclosed in parenthesis. 
Integer arithmetic only. Division by zero is not protected. Operators: 

AND OR NOT + -*/ = ><=>=< <> ( > 

7) Multiple statement lines are accepted (and encouraged). 
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8) You can simulate many of the commands not accepted. le: 



Command 
FOR-NEXT 



Code 

10 FOR J=1 TO 10 

20 PRINT J 

30 NEXT J 



Simu I at ion 

5 J=0 

10 J=J+1 

20 PRINT J 

30 IF J<10 THEN 10 



INT(EXP) 
IF-THEN- ELSE 



10 A=INT(Y/3) 



10 A=(Y/3) AND -1 



10 IF C<0 THEN C=0: GOTO 20 ELSE C=C+1 10 IF C<0 THEN CO: GOTO 20 

15 C=C+1 



9) Disclaimer - Cowpi ler is a simple compiler written in BASIC. It will work on most programs that 
follow the rules listed above. However, I have no doubt that there are programs It will choke on for no 
apparent reason. And I hereby REFUSE to go looking for reasons why YOUR program won't compile right. Unless 
a well documented (by you) out'n'out bug or enhancement is found in Coipi ler , you get the program as is 
without further modifications. 

Putting 1 and 1 together - Load/Merge makes it easy to append a BASIC program on tape to a BASIC program 
in memory. First, you need two BASIC programs, one of them with the highest line number lower than the 
lowest line number of the other. Second, load Load/Merge and run it. Third, load the program with the 
LOWER line numbers. Fourth, type LOAO<enter> and then CLOAD the program with the HIGHER line numbers. Last, 
type MERGE<enter> and your programs will be combined. 

Load/Merge notes: 1) Do not change the length of line 0. 2) Disk users can use the program. 
However, after appending your programs together and saving them onto disk, be sure to reboot the system so 
that the Disk BASIC commands LOAD and MERGE work as they were intended to work. 

An adventure in debugging... 

If you get an OM error in last month's Alexis Adventure , you can try deleting I ine or renumbering the 
program by 1 before running the adventure. We have heard of this problem but have not been able to duplicate 
it, so these 'fixes' may not. 

Taxing bugs... 

Last month's Incowe Tax showed 1981 U.S. Income Tax in line 260. The title was wrong! The tables 
were for 1982 (whew!). Line 420, however, should have read: 

420 IF OSCH*100 THEN EXC=SCH*100 ELSE EXC=C 
Thanks to the author, Charles W. Evans, for noting these. 

Frequently a problem... 

If you only have 16k, last month's Frequency Analysis may have given you fits unless you set the Memory 
Size to 32511. 

Alpha to omega... 

Dennis Lo, the author of Fal ling A I fens (Oct. '82) and Star Fortress (Jan. '83), sent in a couple of 
patches to make those programs work with the Model III Alpha joystick: 



Load Falling Aliens and go to BASIC. Enter and run the following lines: 

10 FOR X=31905 TO 31911: READ A: POKE X,A: NEXT 

20 DATA 245,62,16,211,236,241,201 

30 POKE 29269,205: POKE 29270,161: POKE 29271,124 
Then type SYSTEM<enter> and answer the *? with /29184. Note: The new start, end, and entry addresses are 
29184, 31911, 29184. 
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Load Star Fortress and go to BASIC. 
For Level II BASIC enter and run: 

10 OUT 236,16: POKE 16526,0: POKE 16527,114: PRINT USR(O) 
and for Disk BASIC enter and run: 

10 OUT 236,16: DEFUSR=29184 : PRINT USR(O) 

One final note...? 

Ward P. Ferguson, the author of November 1982's Loan Awtort izat Ion , wants to lay that program to rest so 
he sent in the following mods to the original version to make it LPRINT correctly: 

51 INPUT'-MONTH (COMMA) YEAR OF FIRST PAYMENT";M$,RY: YR=RY:PRINT 

68 YR*RY:P=U1 :P1=0:M1=0:A1=0:B1=0:A2=0:M=U3:LL=0 

75 LPRINTCHR$(27);CHR$(14);» ";A$;CHR$(27) ;CHR$( 15) : REM FOR LP VI I I 

77 LPRINT"PRIrCIPAL: ";P;" 

MONTHS: ";L;" 

RATE (YEAR):»;R;"*« 

117 INPUP'YEAR OF FIRST PAYMENT" ;RY:YR»RY 

125 IFY$<>"Y" YR-RY: GOTO 172 

156 Take the RY=YR fix out that was given in a past yel low sheet. 



HIGH CLASS PROGRAMS 

(on tape or disk) 
AT POOR MAN PRICES 



Mov i n i out , 



J>, 



^-€. 



ed. 




THE 
M.TIRNKTI 

SOURCE 



Spellbound 

Shool-em-ups not your style? Consider 
Spellbound, a sophisticated word game that 
will both "please" and "Mfnund"; "please 
because you will always have a capable 
partner at the the flip ol a switch and 
"astound" because you can demonstrate the 
superior capabilities ot your TRS-80. 
Spellbound conducts a word search using 
its 12,000 word on-line dictionary in less 
than a minute. Words are extracted from a 
matrix ol random letters by both you and 
your TRS-80. One to six humans can play: 
the word matrix is designed using a unique 
graphic contigura tion . The ideal 
demonstration program tor your pedantic 
triends. Spellbound is written in a 
combination of Z80 and Fortran: original 
purchasers can also purchase the source 
code for an additional S10. Sorry, this 
program only comes on disk. Both Model I 
and III versions are included for S19.95. 
Because of critical real-time task 
processing, this program will not work with 
Newdos/80. 

TASORT 
The Alternate SORT 

TASORT is a high speed sorting program, 
designed for easy use in BASIC programs 
that need powerful sort capabilities. 
TASORT is fast, sorts up to 65 arrays 
simultaneously, sorts any combinations of 



variable types, is completely relocatable, 
respects high-memory, and will sort 
ascending, descending and tag-along. 
TASORT works with all Model I and III 
configurations, tape and disk, and is the 
perfect bridge for making your programs 
100% compatible with all environments. 
TASORT is S1995. tape or disk. Write for 
information on licensing TASORT for your 
commercial applications. 

Modem 80 

Need a top quality terminal program that 
works under a variety of enviroments? 
Modem 80 and its support packages have 
the TRS-80 talking with dozens of systems, 
both micros and mainframes. A special 
protocol permits easy and reliable 
communication with CP/M systems, too! 
Modem 80 allows you access to DOS 
commands while online, route screen 
displays to your printer, change all local 
communication parameters at any time, 
upload and download, send files larger than 
memory (if the other system recognizes 
XON and XOFF protocol), and even includes 
a HOST program so that you may access 
your unattended TRS-80 from a remote site. 
Four separate translation tables are 
included for communication output, video, 
printer and disk files. These are user 
modifiable. The Modem 80 package of seven 
programs and user's manual is S39.95. This 
program is one of our best buys! 

Information Storage 
And Retrieval 

ISAR I. Version 2.0. is the ideal beginning 
data base manager. ISAR allows you to 
create data files to your specifications and 
add change and scan records as desired. 
Version 2.0 features include: Sorting of all 
ten fields at once: reports are generated by a 



small BASIC program generated by your 
response to prompts (this allows your 
printer to work at the fastest possible speed 
and reports only need be defined ONCE): 
reports support titles, page numbers, 
column headings, footers, literals, end of file 
totals, special control characters LPRINTed 
before the report and more: documentation 
has been expanded to cover items such as 
error trapping, utilization of disk space, 
sample user sessions and information about 
how ISAR stores the information necessary 
to access a file (making conversions 
between ISAR and other data base 
managers easier). ISAR I. Version 2.0. 
complete with all enhancements and 
documentation. S39.9S. (Unregistered ISAR 
Expanded Users: Upgrades available!) 

The Alternate Source 
Programmer's Journal 

A software toolbox tor your TRS-80 Model 
I and III. Each issue of TAS features utilities 
and applications It..* enhance your 
investment in the revolution. And more. We 
tackle comparison reviews. Model l/lll 
compatibility, useful patches for popular 
programs, modifying BASIC, using Z80 
assembler and many other languages. The 
Alternate Source is S24 for 12 issues. II you 
haven t seen our journal, request a sample 
copy with any product on this page. 

Thanks lor reading our ad! TAS is located 
at 704 North Pennsylvania. Lansing. Ml 
48906. Phones: (517) 482-8270 and (800) 
248-0284 (order-line). Check. Money Order. 
Visa. MC. COD (SI. 75 extra), and written 
P.O.s welcome. We also stock several 
hundred programs Irom other vendors Ask 
for a copy of the latest TAS flyer Dealer 
inquiries welcome 



